home *** CD-ROM | disk | FTP | other *** search
/ EDUCORP 8 / Educorp2Compilation.sit / educorp2 / Programming (2300, 7000) / 7022 Utility Stacks v.2 / Stack Indexer Stack / background_4093.xml next >
Encoding:
Extensible Markup Language  |  1991-04-24  |  3.6 KB  |  108 lines
  1. <?xml version="1.0" encoding="utf-8" ?>
  2. <!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
  3. <background>
  4.     <id>4093</id>
  5.     <filler1>0</filler1>
  6.     <cantDelete> <false /> </cantDelete>
  7.     <showPict> <true /> </showPict>
  8.     <dontSearch> <false /> </dontSearch>
  9.     <link rel="stylesheet" type="text/css" href="stylesheet_2748.css" />
  10.     <part>
  11.         <id>1</id>
  12.         <type>field</type>
  13.         <visible> <true /> </visible>
  14.         <dontWrap> <false /> </dontWrap>
  15.         <dontSearch> <false /> </dontSearch>
  16.         <sharedText> <false /> </sharedText>
  17.         <fixedLineHeight> <true /> </fixedLineHeight>
  18.         <autoTab> <false /> </autoTab>
  19.         <lockText> <false /> </lockText>
  20.         <rect>
  21.             <left>16</left>
  22.             <top>81</top>
  23.             <right>281</right>
  24.             <bottom>304</bottom>
  25.         </rect>
  26.         <style>scrolling</style>
  27.         <autoSelect> <false /> </autoSelect>
  28.         <showLines> <false /> </showLines>
  29.         <wideMargins> <false /> </wideMargins>
  30.         <multipleLines> <false /> </multipleLines>
  31.         <reservedFamily> 0 </reservedFamily>
  32.         <titleWidth>0</titleWidth>
  33.         <icon>0</icon>
  34.         <textAlign>left</textAlign>
  35.         <font></font>
  36.         <textSize>10</textSize>
  37.         <textStyle>plain</textStyle>
  38.         <textHeight>13</textHeight>
  39.         <name>Card_List</name>
  40.         <script>on Lookupput " in background field" && QUOTE &"KeyWords" & QUOTE after msgend lookup</script>
  41.     </part>
  42.     <part>
  43.         <id>4</id>
  44.         <type>button</type>
  45.         <visible> <true /> </visible>
  46.         <reserved5> 0 </reserved5>
  47.         <reserved4> 0 </reserved4>
  48.         <reserved3> 0 </reserved3>
  49.         <reserved2> 0 </reserved2>
  50.         <reserved1> 0 </reserved1>
  51.         <enabled> <true /> </enabled>
  52.         <rect>
  53.             <left>297</left>
  54.             <top>77</top>
  55.             <right>397</right>
  56.             <bottom>99</bottom>
  57.         </rect>
  58.         <style>roundrect</style>
  59.         <showName> <true /> </showName>
  60.         <highlight> <false /> </highlight>
  61.         <autoHighlight> <false /> </autoHighlight>
  62.         <sharedHighlight> <true /> </sharedHighlight>
  63.         <family>0</family>
  64.         <titleWidth>0</titleWidth>
  65.         <icon>0</icon>
  66.         <textAlign>center</textAlign>
  67.         <font>Chicago</font>
  68.         <textSize>12</textSize>
  69.         <textStyle>plain</textStyle>
  70.         <name>Index</name>
  71.         <script>on mouseUpSet LockScreen to Trueput Hilight of button "Long Names" into Use_Long_Onesget the long name of this cardPut it into finalCardput field "Stack_2_Index" into SNamego to stack SNameif the Result is not empty thenAnswer "Whoops, bad stack name!" with OKelseput Number of cards into NCardsrepeat with X = 1 to NCardsgo to stack SNameif Use_Long_Ones thenget the Long name of card Xelseget the short name of card Xend ifPut it into Tempgo to FinalCardPut Temp into line X of Field 1Put "card" && X && "of" && NCards && Temp into Message Windowend repeatend ifend mouseUp</script>
  72.     </part>
  73.     <part>
  74.         <id>5</id>
  75.         <type>field</type>
  76.         <visible> <true /> </visible>
  77.         <dontWrap> <false /> </dontWrap>
  78.         <dontSearch> <false /> </dontSearch>
  79.         <sharedText> <false /> </sharedText>
  80.         <fixedLineHeight> <true /> </fixedLineHeight>
  81.         <autoTab> <false /> </autoTab>
  82.         <lockText> <false /> </lockText>
  83.         <rect>
  84.             <left>297</left>
  85.             <top>140</top>
  86.             <right>502</right>
  87.             <bottom>305</bottom>
  88.         </rect>
  89.         <style>shadow</style>
  90.         <autoSelect> <false /> </autoSelect>
  91.         <showLines> <false /> </showLines>
  92.         <wideMargins> <false /> </wideMargins>
  93.         <multipleLines> <false /> </multipleLines>
  94.         <reservedFamily> 0 </reservedFamily>
  95.         <titleWidth>0</titleWidth>
  96.         <icon>0</icon>
  97.         <textAlign>left</textAlign>
  98.         <font>Geneva</font>
  99.         <textSize>12</textSize>
  100.         <textStyle>plain</textStyle>
  101.         <textHeight>16</textHeight>
  102.         <name>Stack_2_Index</name>
  103.         <script></script>
  104.     </part>
  105.     <name></name>
  106.     <script></script>
  107. </background>
  108.